home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
cpp_libs
/
sos3-2.lha
/
src
/
cci
/
cci_use.h
< prev
next >
Wrap
C/C++ Source or Header
|
1991-11-08
|
5KB
|
124 lines
#ifndef cci_SOSH
#define cci_SOSH 1
#include "knl_use.h"
#include "agg_use.h"
#include "mta_use.h"
typedef sos_Pointer cci_Make_obj;
#define make_cci_Make_obj_object make_sos_Pointer_object
#define make_cci_Make_obj make_sos_Pointer
typedef sos_Pointer cci_IO_fun;
#define make_cci_IO_fun_object make_sos_Pointer_object
#define make_cci_IO_fun make_sos_Pointer
class cci_Schema_impl;
class cci_Method_impl;
#include "cci_ext.h"
sos_Object make_cci_Fun_object(cci_Fun);
cci_Fun make_cci_Fun(sos_Object);
#define _cci_Fun_type sos_Id::make(sos_Container::make(6112440),1316)
#define cci_Fun_type sos_type_object(_cci_Fun_type,sos_Id::make(sos_Container::make(279048),504144))
#define _cci_Make_obj_type sos_Id::make(sos_Container::make(15319856),1640)
#define cci_Make_obj_type sos_type_object(_cci_Make_obj_type,sos_Id::make(sos_Container::make(279048),504144))
#define _cci_IO_fun_type sos_Id::make(sos_Container::make(15319856),1640)
#define cci_IO_fun_type sos_type_object(_cci_IO_fun_type,sos_Id::make(sos_Container::make(279048),504144))
class cci_Schema_impl: public sos_Root_class
{ friend class _cci_Schema_impl;
class _cci_Schema_impl* _ref;
public:
operator sos_Object ();
operator sos_Schema_impl ();
static cci_Schema_impl make(sos_Typed_id&);
static cci_Schema_impl make(sos_Typed_id&p,_cci_Schema_impl*r){
cci_Schema_impl o; o._tpid = p; o._ref=r; return o;}
static cci_Schema_impl make(sos_Root_class&);
sos_Offset _size();
static cci_Schema_impl create(sos_Container);
static cci_Schema_impl copy(cci_Schema_impl,sos_Container);
static cci_Schema_impl clone(cci_Schema_impl,sos_Container);
void destroy();
sos_Int hash_value();
void load();
sos_String_List get_libraries();
void set_libraries(sos_String_List _p1);
sos_String_List get_schemas();
void set_schemas(sos_String_List _p1);
static cci_Make_obj get_make_obj(sos_Id _p1,sos_Id _p2);
static void enter_fun(sos_Id _p1,cci_Fun _p2);
static void enter_string_io(sos_Id _p1,cci_IO_fun _p2,cci_IO_fun _p3);
static sos_Object extern_object_from_string(sos_Type _p1,sos_String _p2);
protected:
static void local_assign(cci_Schema_impl _p1,sos_Object _p2);
public:
sos_Bool has_type(sos_Type _p1);
sos_Bool isa(sos_Type _p1);
sos_Bool operator==(sos_Object _p1);
sos_Bool operator!=(sos_Object _p1);
protected:
static sos_Bool local_equal(cci_Schema_impl x,cci_Schema_impl y,sos_Eq_kind eq_kind = EQ_STRONG);
public:
void assign(sos_Object source);
sos_Bool equal(sos_Object o,sos_Eq_kind eq_kind = EQ_STRONG);
sos_String_List get_object_files();
void set_object_files(sos_String_List _p1);
static cci_Schema_impl make_impl(sos_Schema_module _p1);
static void enter_make_obj(sos_Id _p1,sos_Id _p2,cci_Make_obj _p3);
static cci_Fun get_fun(sos_Id _p1);
static sos_String string_from_extern_object(sos_Object _p1);
protected:
static void local_initialize(cci_Schema_impl _p1);
static void local_finalize(cci_Schema_impl _p1);
public:
sos_Type type();
sos_Bool is_some(sos_Type _p1);
sos_Bool is_value();
sos_Int size();
sos_Bool identical(sos_Object _p1);
sos_Bool like(sos_Object _p1);
sos_Comp_result compare_ids(sos_Object _p1);
protected:
static sos_Int local_hash_value(cci_Schema_impl x);
};
#define _cci_Schema_impl_type sos_Id::make(sos_Container::make(6112440),1704)
#define cci_Schema_impl_type sos_type_object(_cci_Schema_impl_type,sos_Id::make(sos_Container::make(279048),529560))
class cci_Method_impl: public sos_Root_class
{ friend class _cci_Method_impl;
class _cci_Method_impl* _ref;
public:
operator sos_Object ();
operator sos_Method_impl ();
static cci_Method_impl make(sos_Typed_id&);
static cci_Method_impl make(sos_Typed_id&p,_cci_Method_impl*r){
cci_Method_impl o; o._tpid = p; o._ref=r; return o;}
static cci_Method_impl make(sos_Root_class&);
sos_Offset _size();
static cci_Method_impl create(sos_Container);
static cci_Method_impl copy(cci_Method_impl,sos_Container);
static cci_Method_impl clone(cci_Method_impl,sos_Container);
void destroy();
void assign(sos_Object source);
sos_Bool equal(sos_Object o,sos_Eq_kind eq_kind = EQ_STRONG);
sos_Int hash_value();
void enter_fun(cci_Fun _p1);
sos_Object execute(sos_Object _p1,sos_Object_Array _p2);
static sos_String operator_string(sos_String _p1);
static cci_Method_impl make_impl(sos_Method _p1);
sos_Type type();
sos_Bool has_type(sos_Type _p1);
sos_Bool isa(sos_Type _p1);
sos_Bool is_some(sos_Type _p1);
sos_Bool is_value();
sos_Int size();
sos_Bool identical(sos_Object _p1);
sos_Bool operator==(sos_Object _p1);
sos_Bool operator!=(sos_Object _p1);
sos_Bool like(sos_Object _p1);
sos_Comp_result compare_ids(sos_Object _p1);
protected:
static void local_assign(cci_Method_impl x,cci_Method_impl y);
static sos_Bool local_equal(cci_Method_impl x,cci_Method_impl y,sos_Eq_kind eq_kind = EQ_STRONG);
static sos_Int local_hash_value(cci_Method_impl x);
};
#define _cci_Method_impl_type sos_Id::make(sos_Container::make(6112440),16384)
#define cci_Method_impl_type sos_type_object(_cci_Method_impl_type,sos_Id::make(sos_Container::make(279048),529560))
#endif